home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 32
/
Aminet 32 (1999)(Schatztruhe)[!][Aug 1999].iso
/
Aminet
/
dev
/
lang
/
Python152_Src.lha
/
Python152_Source
/
Amiga
/
getpid.c
< prev
next >
Wrap
C/C++ Source or Header
|
1998-12-25
|
413b
|
19 lines
RCS_ID_C="$Id: getpid.c,v 4.1 1994/09/29 23:09:02 jraja Exp $";
/*
* getpid() - stub for the FindTask(NULL)
*
* Copyright © 1994 AmiTCP/IP Group,
* Network Solutions Development Inc.
* All rights reserved.
*/
#include <sys/types.h>
#include <exec/execbase.h>
extern struct ExecBase *SysBase;
pid_t
getpid(void)
{
return (pid_t)SysBase->ThisTask;
}